Top 10k strings from Dominoes (1983)(Micromega)(16k).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TAP] /

Back to the directory listing

   2 ry+(rf-zb)+(rf=za),rx;
   2 ly+(lf-zb)+(lf=za),lx;
   1 zc;"your dominoes because I";
   1 zc;"them - ";
   1 zc;"haven't got one then input 00   and I go."
   1 zc;"generate them I do forget";
   1 zc;"find a domino which has";
   1 zc;"either a ";
   1 zc;"dominoes - 13 each - and";
   1 zc;"domino you want to play - one   half of it must match one of    the ends of the chain."
   1 zc;"been played":
   1 zc;"although obviously I know";
   1 zc;"We play with 26 different";
   1 zc;"The winner is the first one     to use  up all his dominoes":
   1 zc;"Press ENTER to continue":
   1 zc;"I will display your dominoes    and then play the ";
   1 zc;"After specifying your domino    then tell me if you want it     on the right or left of the     chain with the letters 'r'      or 'l'" 
   1 zc;"2 digits to tell me which";
   1 zb;"honestly!":
   1 zb;"Your dominoes:":
   1 zb;"YOU BEAT ME!":
   1 zb;"Please wait a moment while I";
   1 zb;"I CAN'T GO!":
   1 zb,zc;"e.g If these dominoes had";
   1 w$="DOMINOES"
   1 t=t+(r=za):
   1 ry-zc,zb;"right cont'd"
   1 q$(i)=u$+v$
   1 p$(t)=a$(x
   1 o$=o$(zc)+o$(zb):
   1 dominoes by S.Brooks 
   1 d$(i)=u$+v$
   1 c$(t)=a$(x
   1 a$="000102030405061112131415162223242526333435364445465556"
   1 a$(x+zb)=a$(z+zc)
   1 a$(x)=a$(z+zb):
   1 Spots     p
   1 DOMINOESA6
   1 ;"left cont'd"
   1 ;"deal the dominoes":
   1 ;"Which side, right or left? (r/l)";:
   1 ;"We Drew."
   1 ;"Thanks for the game";
   1 ;"Press ENTER to finish":
   1 ;"Cheating again !!":
   1 ;". If you";
   1 ;"- 00 for can't go)       ";:
   1 ;" to get   us started. You then use";
   1 ;" or a ";
   1 ;" Choose your domino ( 2 digits";
   1 ;"  another game? (y/n)"
   1 16015506461344231236340400    
   1 1122152625562435054503331402  
   1 020202140414343336361436363523243335333435364445465556t
   1 -(rf=zc);n$
   1 -(lf=zc);n$
   1 ,zc;"In this game you play ";
   1 ,zc;"I WON!!!!":
   1 ,zc;"Hold on I'm thinking !!"
   1 ,za;l$;l$;
   1 ,za;"You used ";c;" dominoes,I used ";d
   1 ,((k-zb)-(
   1 ,"then you must";
   1 +zb;"       "
   1 *z)/zc)*zc+zb
   1 "You won again.":
   1 "I am the CHAMPION!!":
   1 "   for your domino number - ";
   1  Jan 83 vers 5#7
   1         L 
   1